home *** CD-ROM | disk | FTP | other *** search
/ Surfin' Sam - A Hilariously Interactive Game / Surfin Sam.iso / pc / sam_232.dir / 00936.ls < prev    next >
Encoding:
Text File  |  1995-07-17  |  1.6 KB  |  61 lines

  1. on enterFrame
  2.   set the timeoutScript to EMPTY
  3.   if the puppet of sprite 40 = 1 then
  4.     set the visible of sprite 6 to 0
  5.     set the visible of sprite 7 to 0
  6.     set the visible of sprite 11 to 0
  7.     set the visible of sprite 10 to 1
  8.     set the visible of sprite 5 to 0
  9.     if soundBusy(1) = 0 then
  10.       sound stop 1
  11.       sound stop 2
  12.       if the movieRate of sprite 2 = 0 then
  13.         set the movieRate of sprite 2 to 1
  14.       end if
  15.       vidset()
  16.       puppetSprite(11, 1)
  17.       puppetSprite(28, 0)
  18.       puppetSprite(40, 0)
  19.     end if
  20.   else
  21.     if the puppet of sprite 40 = 0 then
  22.       set the visible of sprite 8 to 0
  23.       set the visible of sprite 12 to 0
  24.       set the visible of sprite 13 to 0
  25.       set the visible of sprite 14 to 0
  26.       set the visible of sprite 16 to 0
  27.       if rollOver(17) then
  28.         set the visible of sprite 8 to 1
  29.       end if
  30.       if rollOver(18) then
  31.         set the visible of sprite 12 to 1
  32.       end if
  33.       if rollOver(19) then
  34.         set the visible of sprite 13 to 1
  35.       end if
  36.       if rollOver(20) then
  37.         set the visible of sprite 14 to 1
  38.       end if
  39.       if rollOver(21) then
  40.         set the visible of sprite 16 to 1
  41.       end if
  42.       updateStage()
  43.       if the movieTime of sprite 2 = the duration of cast 302 then
  44.         set the sound of cast 913 to 0
  45.         set the movieRate of sprite 2 to 0
  46.         set the visible of sprite 2 to 0
  47.         puppetTransition(37, 1, 70)
  48.         set the visible of sprite 7 to 0
  49.         set the visible of sprite 11 to 0
  50.         puppetSprite(9, 0)
  51.         go("prpg")
  52.       end if
  53.     end if
  54.   end if
  55. end
  56.  
  57. on exitFrame
  58.   updatecontroller()
  59.   go(the frame)
  60. end
  61.